home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / oper_sys / quartz / quartz10.lha / src / presto / machdep.h < prev    next >
Encoding:
C/C++ Source or Header  |  1990-05-02  |  962 b   |  34 lines

  1.  
  2. #ifdef sequent
  3. // STACK GROWS DOWN
  4. #define FP(p)        ( (int*)(&p+1) )
  5. #define STACK_BASE(b,s)     b + s - 1
  6. #define COPY_STACK(f,c,t)   while (c--) *t-- = *f--
  7. #define ACTIVE_STK_SZ(b,t)  b - t + 1    /* size of active stack */
  8. #define PUSH(sp,word)        { *sp-- = word;}
  9. #define SAVPC(fp)    (int*)*((fp+1))
  10. #define SAVFP(fp)    (int*)*(fp)
  11. #endif sequent
  12.  
  13. #ifdef vax
  14. //
  15. // All just the same as on the sequent...
  16. //
  17. #define FP(p)        ( (int*)(&p+1) )
  18. #define STACK_BASE(b,s)     b + s - 1
  19. #define COPY_STACK(f,c,t)   while (c--) *t-- = *f--
  20. #define ACTIVE_STK_SZ(b,t)  b - t + 1    /* size of active stack */
  21. #endif vax
  22.  
  23. #ifdef sun     
  24. // STACK GROWS UP, not down.
  25. //
  26. //#define FP(p)        ( (int*)(&p+1) )
  27. //#define STACK_BASE(b,s)     b + s - 1
  28. //#define COPY_STACK(f,c,t)   while (c--) *t-- = *f--
  29. //#define ACTIVE_STK_SZ(b,t)  b - t + 1    /* size of active stack */
  30. //#define PUSH(sp,word)        { *sp-- = word;}
  31. //#define SAVPC(fp)    (int*)*((fp+1))
  32. //#define SAVFP(fp)    (int*)*(fp)
  33. #endif sun
  34.